(backquote-process): Handle `[,@SYMBOL].

diff --git a/lisp/emacs-lisp/backquote.el b/lisp/emacs-lisp/backquote.el
index 9b7e7a95fb36f220beb5c90b63a206784dd626c7..ea5fd54094c7c08f7b2fc880145bda2dbc80a49c 100644 (file)
--- a/lisp/emacs-lisp/backquote.el
+++ b/lisp/emacs-lisp/backquote.el
@@ -114,6 +114,8 @@ Vectors work just like lists.  Nested backquotes are permitted."
       (if (= (car n) 0)
          (cons 0 s)
        (cons 1 (cond
+                ((not (listp (cdr n)))
+                 (list 'vconcat (cdr n)))
                 ((eq (nth 1 n) 'list)
                  (cons 'vector (nthcdr 2 n)))
                 ((eq (nth 1 n) 'append)